﻿Imports DQDataTypes = App_Code.DQDataTypes
Imports IUIBuildingBlock = App_Code.IUiBuildingBlock
Partial Class UserControls_DQStringQuestion
    Inherits System.Web.UI.UserControl
    Implements IUIBuildingBlock

    Public ReadOnly Property DataType() As DQDataTypes Implements IUIBuildingBlock.DataType
        Get
            Return DQDataTypes.String
        End Get
    End Property

    Public Property QuestionId() As Integer Implements IUIBuildingBlock.QuestionId
        Get
            Return CType(dqQuestionId.Value, Integer)
        End Get
        Set(ByVal value As Integer)
            dqQuestionId.Value = CType(value, String)
        End Set
    End Property

    Public Property Answer() As Object Implements IUIBuildingBlock.Answer
        Get
            Return dqAnswer.Text
        End Get
        Set(ByVal Value As Object)
            dqAnswer.Text = Value
        End Set
    End Property

    Public Property QuestionText() As String Implements IUIBuildingBlock.QuestionText
        Get
            Return dqQuestion.Text
        End Get
        Set(ByVal Value As String)
            dqQuestion.Text = Value
        End Set
    End Property
End Class
